home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 011 / brutil.arc / @POPDIR.BAT < prev    next >
Encoding:
DOS Batch File  |  1988-06-08  |  512 b   |  19 lines
  1. %VDISK%KEYSEND 6800 6800
  2. %VDISK%LAST <%1\DIRFILE >%VDISK%\DIRFILEX
  3. IF NOT ERRORLEVEL 1 GOTO OK
  4. ECHO no more directories
  5. goto end
  6. :ok
  7. %VDISK%LAST - <%1\DIRFILE >%1\DIRFILE.NEW
  8. DEL %1\DIRFILE
  9. REN %1\DIRFILE.NEW DIRFILE
  10. %VDISK%ATTR -A %1\DIRFILE >NUL
  11. %VDISK%COMBINE -"CD " <%VDISK%\DIRFILEX >%VDISK%\DIRFILEX.BAT
  12. %COMSPEC% /C %VDISK%\DIRFILEX >NUL
  13. TYPE %VDISK%\DIRFILEX
  14. :END
  15. DEL %VDISK%\DIRFILEX.*
  16. DISK%\DIRFILEX >%VDISK%\DIRFILEX.BAT
  17. %COMSPEC% /C %VDISK%\DIRFILEX >NUL
  18. TYPE %VDISK%\DIRFILEX
  19. :END